Fix typo

diff --git a/which-key.el b/which-key.el
index d4ab3183306e99a741bb608592d07f2dd9954c86..d9e7b3a2ffeea05a3f272a96eeb343791cddb7f5 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -564,9 +564,9 @@ addition KEY-SEQUENCE NAME pairs) to apply."
         (-name (if (consp name) (car name) name))
         (-title (if (consp name) (cdr name) name)))
     (while key-sequence
-      (setq mode-name-alist (which-key--add-key-val-to-list
+      (setq mode-name-alist (which-key--add-key-val-to-alist
                              mode-name-alist key-sequence -name)
-            mode-title-alist (which-key--add-key-val-to-list
+            mode-title-alist (which-key--add-key-val-to-alist
                               mode-title-alist key-sequence -title))
       (setq key-sequence (pop more) name (pop more)))
     (if (assq mode which-key-prefix-name-alist)